home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Users Group Library 1996 July / C-C++ Users Group Library July 1996.iso / listings / v_11_08 / weber / loadsave.c < prev    next >
Text File  |  1993-03-11  |  13KB  |  335 lines
  1. /***************************************************************
  2.  * file: LOADSAVE.C
  3.  * purpose: dialog box routine for getting a file name from the
  4.  *          user.  Has the expected listbox, editbox and file system
  5.  *          smarts.  Written for the simple gui system; GUI.C, MENU.C
  6.  *          and DIALOG.C
  7.  * system: Flash graphics library in Zortech 3.0
  8.  *          MSDOS dependencies in _dos_findfirst, _dos_findnext, path/file names
  9.  *          and wildcard usage.
  10.  * contains:
  11.  *      short loadsave(char *search,char *choice,unsigned short status);
  12.  *      short loadsave_add_button(BUTTON *button,short (*message_handler)(MESSAGE *));
  13.  *      short loadsave_button_location(BUTTON *button,short *loc_x,short *loc_y);
  14.  * copyright: 1992 by David Weber.  All rights reserved.
  15.  *  This software can be used for any purpose as object, library or executable.
  16.  *  It cannot be sold for profit as source code.
  17.  * history:
  18.  *  01-13-92 - initial code
  19.  *  01-31-93 - this code is now obsolete, see the CPP gui package
  20.  **************************************************************/
  21.  
  22. #define MSDOS 1
  23.  
  24. #include <stdio.h>
  25. #include <stdlib.h>
  26. #include <string.h>
  27. #include <dos.h>
  28. #include <io.h>
  29. #include "gui.h"
  30. #include "loadsave.h"
  31.  
  32.  
  33. /* local data */
  34. static char edit_string[FILENAME_MAX+1];
  35. static char search_string[FILENAME_MAX+1];
  36. static BUTTON *extra_button[LOADSAVE_MAX_BUTTONS];
  37. static short (*extra_message[LOADSAVE_MAX_BUTTONS])(MESSAGE *);
  38. static short extra_button_count = 0;
  39.  
  40.  
  41. /* local prototypes */
  42. static short first_dir(char *filename);
  43. static short next_dir(char *filename);
  44. static void setup_wildcards(char *dest,char *source);
  45. static void merge_path_filename(char *path,char *filename);
  46. static short check_wildcard_or_directory(char *path);
  47.  
  48.  
  49. /* dialog box data */
  50.  
  51. /* dialog ids */
  52. #define D_LS_OK 23991
  53. #define D_LS_CANCEL 23992
  54. #define D_LS_LISTBOX 23993
  55. #define D_LS_EDITBOX 23994
  56.  
  57. /* dialog dimensions */
  58. #define D_LS_WIDTH (38*DIALOG_UNITS)
  59. #define D_LS_HEIGHT (15*DIALOG_UNITS)
  60.  
  61. /* listbox dimensions in text cells */
  62. #define LISTBOX_WIDTH 12    /* MSDOS filename width */
  63. #define LISTBOX_HEIGHT 8
  64.  
  65. /* editbox width in text cells */
  66. #define EDITBOX_SCREEN_WIDTH 33         /* displayed width */
  67. #define EDITBOX_EDIT_WIDTH FILENAME_MAX /* editable width */
  68.  
  69. /* dialog box #1 */
  70. static TEXT dialog_ls_text1 = {"",14*DIALOG_UNITS,13*DIALOG_UNITS+DIALOG_UNITS/2,DIALOG_ACTIVE};
  71. static EDITBOX dialog_ls_editbox = {D_LS_EDITBOX,2*DIALOG_UNITS,11*DIALOG_UNITS+DIALOG_UNITS/2,EDITBOX_SCREEN_WIDTH*DIALOG_UNITS,EDITBOX_EDIT_WIDTH,edit_string,DIALOG_ACTIVE};
  72. static LISTBOX dialog_ls_listbox = {D_LS_LISTBOX,2*DIALOG_UNITS,3*DIALOG_UNITS,LISTBOX_WIDTH*DIALOG_UNITS,LISTBOX_HEIGHT*DIALOG_UNITS,first_dir,next_dir,DIALOG_ACTIVE};
  73. static BUTTON dialog_ls_ok = {D_LS_OK,"Ok",F10,D_LS_WIDTH-5*DIALOG_UNITS,DIALOG_UNITS,DIALOG_ACTIVE};
  74. static BUTTON dialog_ls_cancel = {D_LS_CANCEL,"Cancel",ESC,3*DIALOG_UNITS,DIALOG_UNITS,DIALOG_ACTIVE};
  75. static DIALOG_ITEM dialog_ls[] =
  76.     {
  77.     {DIALOG_TEXT,&dialog_ls_text1},
  78.     {DIALOG_EDITBOX,&dialog_ls_editbox},
  79.     {DIALOG_LISTBOX,&dialog_ls_listbox},
  80.     {DIALOG_BUTTON,&dialog_ls_cancel},
  81.     {DIALOG_BUTTON,&dialog_ls_ok}
  82.     };
  83.  
  84.  
  85.  
  86. /************************************************
  87.  * function: short loadsave(char *search,char *choice,unsigned short status)
  88.  *      get a file name from the user with all the usual gui goodies.  loadsave
  89.  *      does not open/read or create/write the file, it justs gets a name
  90.  * parameters: search string for list box directory list.  If the search string
  91.  *             is a path and filename it should contain appropriate wild cards.
  92.  *             If it is a directory then loadsave will temporarily append the
  93.  *             wildcards.
  94.  *             choice string for holding the user's selection.
  95.  *             status is either LOADSAVE_LOAD if opening a file or
  96.  *             LOADSAVE_SAVE if saving one.  Also the bit flag LOADSAVE_VERIFY
  97.  *             will verify the files existence before opening it (LOAD) or
  98.  *             verify overwriting an existing file (SAVE).
  99.  * returns: 1 if there is a valid file name in choice, 0 if error or escaped
  100.  ************************************************/
  101. short loadsave(char *search,char *choice,unsigned short status)
  102.     {
  103.     MESSAGE message;
  104.     short i,button_count;
  105.  
  106.     setup_wildcards(search_string,search);  /* set up edit/list strings */
  107.     strcpy(edit_string,search_string);
  108.     if (status & LOADSAVE_LOAD)             /* load or save? */
  109.         dialog_ls_text1.name = "Open File";
  110.     else
  111.         dialog_ls_text1.name = "Save File";
  112.     if (!dialog_open(dialog_ls,sizeof(dialog_ls)/sizeof(DIALOG_ITEM),-1,-1,D_LS_WIDTH,D_LS_HEIGHT))
  113.         {
  114.         extra_button_count = 0;
  115.         return 0;
  116.         }
  117.     for (i = 0 ; i < extra_button_count ; i++)
  118.         if (!dialog_add_item(DIALOG_BUTTON,extra_button[i],dialog_ls))
  119.             {
  120.             extra_button_count = 0;
  121.             return 0;
  122.             }
  123.     button_count = extra_button_count;
  124.     extra_button_count = 0;
  125.     for (;;)        /* loop on messages */
  126.         {
  127.         message_get(&message);
  128.         for (i = 0 ; i < button_count ; i++)    /* check extra buttons */
  129.             if (message.id == extra_button[i]->id)
  130.                 if (!(*extra_message[i])(&message))
  131.                     {
  132.                     dialog_close(dialog_ls);
  133.                     return 0;
  134.                     }
  135.         switch (message.id)                     /* check standard buttons */
  136.             {
  137.             case D_LS_LISTBOX:                      /* put listbox selection into editbox */
  138.                 merge_path_filename(edit_string,message.data.ptr_data);
  139.                 editbox_initialize(&dialog_ls_editbox);
  140.                 break;
  141.             case D_LS_OK:                           /* user said accept it */
  142.             case D_LS_EDITBOX:
  143.                 if (message.id == D_LS_EDITBOX && message.data.short_data.x != EDITBOX_ACCEPT)
  144.                     break;
  145.                 if (check_wildcard_or_directory(edit_string))
  146.                     {                               /* new fodder for list box */
  147.                     strcpy(search,edit_string);
  148.                     setup_wildcards(search_string,search);
  149.                     strcpy(edit_string,search_string);
  150.                     editbox_initialize(&dialog_ls_editbox);
  151.                     listbox_initialize(&dialog_ls_listbox);
  152.                     break;
  153.                     }
  154.                 if (status & LOADSAVE_VERIFY)       /* verify? */
  155.                     {
  156.                     if (status & LOADSAVE_LOAD)
  157.                         {
  158.                         if (access(edit_string,F_OK) != 0)
  159.                             {
  160.                             message_box("File does not exist");
  161.                             break;
  162.                             }
  163.                         }
  164.                     else
  165.                         {
  166.                         if (access(edit_string,F_OK) == 0)
  167.                             {
  168.                             if (yn_box("File exists.  Overwrite it") == 0)
  169.                                 break;
  170.                             }
  171.                         }
  172.                     }
  173.                 dialog_close(dialog_ls);
  174.                 strcpy(choice,edit_string);
  175.                 return 1;
  176.             case D_LS_CANCEL:                       /* user said outta here */
  177.                 dialog_close(dialog_ls);
  178.                 return 0;
  179.             default:                                /* check if error */
  180.                 if (error_box(message.id))
  181.                     {
  182.                     dialog_close(dialog_ls);
  183.                     return 0;
  184.                     }
  185.                 break;
  186.             }
  187.         }
  188.     }
  189.  
  190.  
  191. /* get first filename from search_string, returns 1 if OK or 0 if no such critter */
  192. /* MSDOS dependent */
  193. static struct find_t find_file;
  194. static short first_dir(char *filename)
  195.     {
  196.     if (_dos_findfirst(search_string,FA_NORMAL,&find_file) != 0)